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PREFACE 
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SECTION I 


INTRODUCTION 


PURPOSE 


Utility is a system providing peripheral storage device processing 
capabilities. It permits copying, copying with merge capability, copying with 
resequencing capability, comparing, positioning, and printing. 


Utility is used both for operational and debug purposes. It resides in 
system storage and is called by the user through the General Comprehensive 
Operating Supervisor (GCOS) (unconditionally by the S UTILITY card or 
conditionally by the $ ABORT card). 


CAPABILITY 


Utility processes magnetic tapes (logically or physically), linked disk 
files (logically only), or random disk files as specified by user-supplied 
control cards. Utility system capabilities are: 


* Copy (COPY) a specified number of files and/or records from first file 
code to second. 


& Copy (MCOPY) the information from a specified number of files and/or 
records from first file code to second without any separating or 
terminating labels or file marks (17 octal). 


Print (DUMP, ADUMP, AADUMP, DDUMP) a specified number of files and/or 
records. 
# Compare (COMP) a specified number of files and/or records from first 


file code to second. 
& Position a specified storage device: 


Ee Rewind (REW or RWD). 


Ze Skip (SKIP) a specified number of files and/or records on tape or 
disk. 
36 Backspace (BKSP) a specified number of files and/or records on 


tape or disk. 


@ Provide user with capability (OWN CODE) for adding his own 
instructions tor a. Utility Lun. 

@ Repeat (RPT) the next m parameters n times. 

& Copy (RSAVE) a random file to magnetic tape. 

® Copy (RREST) a file from magnetic tape to a random file. 

% Copy (RCOPY) a random file to another random file. 
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SECTION II 


GENERAL USAGE 


UTILITY CONTROL CARDS 


The following are control cards associated with Utility: 


1 8 16 

S UTLLLTY (DUMP/NDUMP ) 
Utility call card(s) 

$ ABORT (None) 

AS) (File) (Variables) Standard GCOS file control card(s) 
such as $ TAPE, $ TAPES, and $ FILE. 

$ QUTIL (Variables) Describes Verity processing 
options. 

S FFILE (Variables) Describes nonstandard file control 
blocks. 

S) FUTIL (Variables) Describes functions to be performed 
by Utility. 

S ETC (Variables) Continuation card which can be’ used 


if parameters do not all fit ona $ 
FRPILE, ‘S FUTIL,. or $ QUTIL card. 


STANDARD OPTIONS (Assumes System Standard Format) 


The following standard options are assumed for a particular file code. 


Block Size: 


Logical record processing: 320 words. 


Physical rcecord processing: length of 
Compare function. Because the Compare 
memory at the same time, it uses half 
record. 


available storage for all but the 
function must have two records in 
of the available storage for each 


DDIZ 


Number of Buffers: 
Logical record processing: Two buffers per file code. 
Physical record processing: Two buffers for Compare; all other functions, 
only one common buffer. 

Record Form: 


Variable-length records 


Labels: 


Standard File and Record Control labels 


Block Serial Numbers: 
Assumed 


Density: 


High? 


Mode: 


Binary 


Retention Period: 


0 


Mode of Processing: 


Logical record processing 


NONSTANDARD OPTIONS 


Nonstandard options are specified to Utility by means of a $ FFILE card. 
This card is in the following format: 
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S FFILE file code, parameters 


la density setting parameter on a $ TAPE control card controls the density 
setting for the MTU0400, MTU0500 (Series 60 only) or MTS500 magnetic tape 
subsystem. If this optional field is not utilized, the system default high 
density setting is selected. 
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A file code is a two-character alphanumeric code assigned to the file. This 
is the same file code assigned by the user on the GCOS file card to uniquely 
identify a particular file. Parameters must be separated by commas. 


The parameters for nonstandard options processed by Utility are’ 


NSTDLB or Do not create or verify Tf the PHYREC option. is-used: 

NLABEL standard labels fOr an input ftile--these. are 
unnecessary. For an output file-- 

MODBCD or Set recording mode to BCD \MODBCD and LODENS are ignored 

MBCD if ASIS is specified on a $ QUTIL 
card preceding the $ FUTIL card. 


LODENS'or Set device to low density 
LDENS 


ASAQ* Set recording mode to ASA 
9-track tape format. The 
RT9 command is used for 
reading and WT9 is used 
for writing by File and 
Record Control. Applicable 
to 9-track magnetic 
tape only. 


BUFSIZ/n Set buffer size to n. 


Limit is 4095 words or Ignored for an input file if 
less, depending upon PHYREC option is being used 
storage available. for that file. Also ignored 
for an output tite 16 tt 16-4 
FIXLNG/n Records are fixed tape file being made by a 
or FXXX length, n words long. physical (PHYREC) copy function. 


NOSRLS or Do not use block serial 
NSER numbers 


RETPER/n Place the retention period n into the output label. The 
or RXXX upper limit for n is 999. If a retention period greater 
than 999 is specified, 999 is used. Applicable only 
to labeled output magnetic tape files. 


1 For ASA magnetic subsystems, the LODENS parameter should be used for low 
density tapes. For the MTU0400, MTU0500 (Series 60 only) or MTS500 magnetic 
tape subsystems, the density should be made known to Utility through the 
Density parameter on the $ TAPE control card. 


2 The ASAI parameter should not be used for normal 9-track tape handisang,. It. is 
used only when the special ASA9 recording format is required. 


3For the MTU0400, MTUO0500 (Series 60 only) or MTS500 magnetic tape subsystem, a 


density setting field on the $ TAPE control card for the output file is ignored 
if the ASIS option is specified. 
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NDATE For a COPY function of labeled magnetic tape to labeled magnetic 
tape, use the current (new) date as the creation date for the 
output file rather than copying the creation date from the input 
file. This option can be used only on an output $ FFILE card. 


MLTRL Specifies that input is an unlabeled file on multiple reels. A 
CE message is given to the operator at a standard EOF. If the 
MLTRL option is not used, Utility does not read more than one 
reel of an unlabeled file. 


MLTFIL Specifies multifiles. It should be used if there is a 
possibility that an output magnetic tape file may exceed one 
reel. This prevents the creation of an illegal file (being both 
multifile and multireel). 


PHYREC Utility determines the mode (except ASA9, which must be 
specified), density, and labeling conditions of the input 
magnetic tape file. Physical tape records, limited in size only 
by available storage, are processed (see PHYREC, below) by means 
of DCWs generated within Utility. PHYREC is applicable only to: 


magnetic tape files. 


RANDOM/n This input file is a random disk file that can be DUMPed, 
DDUMPed or SKIPed. The dump or skip is on the basis of 
fixed-length records only, n words long (n cannot be larger than 
1280 words). If n=0, record size is assumed to be 64 for disk 
storage files. Processing of a given RANDOM file must _ be 
completed on one $ FUTIL card because all open data files are 
closed at the completion of a $ FUTIL card. Processing of a 
RANDOM file must also be completed before processing of another 
file 1s started. (See Section III for an example of the use of 
the random disk file dump/skip capability.) The random parameter 
can also be used for dumping a linked file. This can be done by 
declaring the linked file random on its GCOS control card and on 
Utility's FFILE card when dumping the file. 


Note that n is written as an unsigned decimal integer. Parameters not 
mentioned above are listed as illegal parameters and then ignored. 


The nonstandard options specified on a $ FFILE card remain in effect for 
that file code for the rest of the activity unless changed by another $ FFILE 
card, which always (even if it contains nothing but an illegal parameter) 
completely resets Utility $ FFILE tables for that file code. A $ FFILE card must 
precede a $ FUTIL card if the nonstandard options it specifies for a file are to 
be in effect for the functions specified on that $ FUTIL card. This is because 
Utility processes its control cards one at a time. The Utility routine permits a 
maximum of 24 $ FFILE control cards per activity. 


PHYSICAL RECORD PROCESSING 
Physical record processing (PHYREC) provides the following capabilities not 
available with logical record processing. 


1 It allows processing of magnetic tape input about which nothing is 
known (for example: mode and record form). 


ea It allows processing of magnetic tape records larger in size than 4095 
words, the maximum size for logical record processing. 


as It allows processing of mixed mode, mixed density magnetic tape files. 


Mixed mode is handled within files; density (and labeling conditions) 
may change only from file to file. 
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PHYREC need not be specified for an output file for a physical copy. The 
COPY function, when the PHYREC option has been specified for the input file, 
causes physical copying to the output file. The output file is treated in a 
physical mode for all subsequent FUTIL functions on the same . SUSI... card, <Et 
is, however, treated logically for any subsequent $ FUTIL cards unless it is 
explicitly set for physical record processing by a (S FFILE) PHYREC option 
before the subsequent $ FUTIL cards. 


The user should be aware of the fact that during physical record 
processing, block serial numbers are considered only as data words if they 
appear on the input file. If a file with block serial numbers is being copied 
physically and any input records are skipped either by the SKIP function or the 
IGNORE option, the corresponding block serial numbers will also be missing in 
the output. (Use of the RESEQ option on a $ QUTIL card avoids these problems.) 
Also, if NSTDLB option is used with physical record processing, a standard 
label, followed by an EOF mark (octal 17), is treated as one file. 


UTILITY FUNCTIONS 


Utility functions are defined by the $ FUTIL card as follows: 
2 8 16 ta 


S$ FUTIL filecode 1,filecode 2,options 


The operand field contains the file code of each of the two files (maximum 
per $ FUTIL card) being serviced, Utility creates a file control block and, for 
logical record processing, reserves two buffers for each file code. These file 
control blocks are set to standard options unless previously modified by $ FFILE 
cards. If two file codes are not needed, a comma must be used in place of the 
missing file code. Multiple $ FUTIL cards are permitted within an ACTANILY... “he 
RPT function and all functions to be repeated must be on a single $ ETC card 
that follows and continues a $ FUTIL card. 


The functions permitted by Utility are as follows: 


Option Meaning 
COPY/M/ Copy M from first file (filecode 1) to 
second file (filecode 2). 
MCOPY/M/ Cony -M from first: file’ (filecede 2) . to 
second file (filecode Zz) without 


separating or terminating labels or 
file marks (17 octal). 


COMP/M/ Compare M from first file (filecode 1) 
to second file (filecode 2). 


SKIP/M,N/ Skip M on first file (filecode 1) and N 
of second file (filecode 2). 


BKSP/M,N/ Backspace M on first file (filecode 1) 
and N of second file (filecode 2). 


DUMP/M,N/ Dump M from first file (filecode 1) and 


N from second file (filecode 2) in 
octal and BCD equivalent. 
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ADUMP/M,N/ Dump M from first file (filecode 1) and 
N from second file (filecode2) in octal 
and it's ASCII equivalent (applicable 
only to time sharing created files, 
type 5 or 6, and to ASCII files under 
physical record processing). 


RPT /mP ,nT/ Repeat the next m functions n times. 
AADUMP/M,N/ Dump M from first file (filecode 1) and 
N from second file (filecode 2) in 


ASCII representation only (applicable 

only to time sharing created files, 

type 5 or 6, and to ASCII files under 
- physical record processing). 


DDUMP/M,N/ Dump M from the first file (filecode 1) 
and N from the second file (filecode 2) 
in BCD representation only. 


RWD (or REW)/filecode 1,filecode 2/ Rewind file filecode 1 and file 
filecode 2. 


HOLD/filecode 1,filecode2/ Do not close files filecode 1 and 
filecode 2 at the completion of the 
functions specified on this $ FUTIL 
card (see HOLD definition, Section IV). 


RSAVE/1F/ Copy one random file (filecode 1) to a 
magnetic tape (filecode 2). 

RREST/ LF / Copy one file from magnetic tape 
(filecode 1) to a random file (filecode 
2). 

RCOPY/1F/ Copy one random file (filecode 1) to 


random file (filecode 2). 


The M represents the number of files (#F) and/or number of records’ (#R) 
from filecode 1, and the N represents the number of files and/or records from 
filecode 2. (Neither M nor N can be zero.) These parameters can be specified, 


for example, as 3F4R, 4F, or 5R. (If an end-of-file is encountered during a 
record countdown, the record count iS considered exhausted.) File codes referred 
to here as filecode 1 and filecode 2 can be designated by any two alphanumeric 
characters. 


2-6 DD12 


UTILITY PROCESSING OPTIONS 


Optional courses of 


action that can be taken by Utility during its 


fa, processing can be specified on the $ QUTIL card. 
1 16 72 
$ Options 


The options that can be specified on the $ QUTIL card are as_ shown below. 
(If an option is not specified, the underlined option is assumed.) 


Option 


EOF/ALL 


ASIS 


CMPERR/n 


NBYPSS 


Meaning 


Count all file marks (except octal 75, 76) as file 
delimiters. (Nonstandard file marks are still copied 
to output during a copy function even though they are 
now treated as file delimiters.) 


Count only octal 17 file marks as file delimiters. 
Copy to output tape in same mode, density, and 
labeling condition as input tape. Applicable only to 
PHYREC processing. 


Copy according to nonstandard options indicated on 
output S FFILE card; where none, copy according to 


standards. 


NOTE: For the MTU0400, MTUO500 (Series 60 only) or 
MTS500 Tape Subsystems, DEN5 must be specified 
on the input $ TAPE card when doing an ASIS 
copy of a 556 bpi input tape file. Otherwise, 
an 800 bpi output tape may result. 


n is the number of compare errors which will be 
accepted. Utility terminates with a fatal error on the 
n + 1 compare error. n can range from 0 to 262,143. If 
the end of the Utility activity is reached before nm + 
1 compare errors are encountered, the presence of one 
or more compare errors still causes a fatal error. 


Terminate activity with fatal error when 50 compare 
errors have been encountered. 


Do not bypass noise records. The Exception Processing 
override option, which provides no noise record test, 
is used. Applicable to input magnetic tape file only. 


The NBYPSS option should be used if there is a 
possibility that the tape to be read contains any 1l- 
or 2-word physical records. If the option is not used, 
1l- or 2-word physical records having bad parity are 
treated as noise records and so bypassed. 


Whenever the NBYPSS option is used, the density and 
mode of the input tape must be made known to _ the 
Utility program in advance. The Utility program cannot 
determine the density and mode while the program is in 
the physical record processing mode, as is usually the 
case. 


Bypass noise records. 
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USE/n or IGNORE/n nis the number of input nonrecoverable parity errors 
accepted (with the appropriate USE or IGNORE action 
taken) before the activity is terminated with a _ fatal 
error. 


Terminate activity with fatal error when an input 


nonrecoverable parity error is encountered. 


The following table summarizes action taken for the USE and IGNORE options 
on nonrecoverable input parity errors until count n is exceeded: 


Directives 


Dump complete Dump physical record| Dump physical record 
physical record with} on P* with error on P* with error 
error message. message. Copy and message; compare and 
Continue. continue. continue. 


Ignore Print error message Dump physical record] Dump physical record 
only. Continue. on P* with error on P* with error 
message; do not message; terminate 
copy; continue. activity immediately 
with a fatal error. 


The error message on P* is as follows: 


FILE-XXXX BLOCK-XXXX FILE CODE XX NONRECOV. PARITY ERROR 


For input nonrecoverable parity errors: the operator is always bypassed 
during physical record processing; the operator is bypassed during logical 
record processing if a USE or IGNORE option is used. 


It 1s not recommended that the USE options be used for logical record 
processing of variable-length records. If the record-size field of one of the 
record-size control words is in error, the input record cannot be unblocked 
correctly; and the run is aborted. 


Option Meaning 
RESEQ During a physical record COPY or MCOPY, reserialize the output 


file (build new block serial numbers). 


input to the output. 


If during the course of resequencing COPY or MCOPY, an input block number 
is out of sequence, the following message is put to P*: 


*BSN ERR*. EXPECTED XXXXXX, FOUND XXXXXX, RESEQ'D TO XXXXXX 
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In addition, the block is dumped to P*, the expected block number counter 
is reset to the block number of this block, and the block itself 1s given the 
next sequential output block sequence number before it is copied to the output 
file. 


This option is useful not only for building a reserialized copy of an 
existing tape file with block serial numbers out of sequence, but also for 
building a serialized output file in the physical record processing mode from 
pieces of other files. For example, an MCOPY of three files on one tape in the 
physical record processing mode would result in one file on the output, the one 
file having block serial numbers out of sequence (input block serial numbers 
copied to output) unless the RESEQ option were used. 


If Block Serial Numbers are used, the RESEQ option must be selected for a 
physical copy of multi-reel files to avoid the BLK. SERIAL SEQUENCE IN _ ERROR 
message. 


Option Meaning 


USER The user has supplied subroutine(s) to modify files during a 
UTiLoLEY fons 


The options specified on a $ QUTIL card remain in effect for the rest of 


the activity, with the following exception: three $ QUTIL options can be reset 
in the same activity by use of another $ QUTIL card. These are: 


USE, IGNORE, and CMPERR 


A $ QUTIL card must be placed before a $ FUTIL card if the processing 
options that it defines are to be in effect for the functions specified on the $ 
FUTIL. Card, 
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SECTION III 


SPECIFIC USAGE 


CALLING IN UTILITY 


Utility can be referred to as a separate activity or as a subactivity of a 
particular job. The $ UTILITY control card is needed to call Utility as a 
separate activity. 


8 16 


$ UTILITY Options 


The following options can be specified in the operand field. (If an option 
is not specified, the underlined option is assumed.): 


DUMP: Dump all of slave core if the Utility activity is aborted. 
NDUMP: Program registers, upper SSA, Utility's File Control Block, and 


slave program prefix are dumped if the Utility activity is aborted. 


When the System Input Collector encounters this card, it opens a U* file. 
All subsequent Utility control cards, up to the next $ control card indicating a 
new activity, are placed on that file. The U* file then becomes the input file 
For: UPL ICE; 


The 8 ABORT card (used instead of the S$ UTILITY card) calls Utility as an 
abort subactivity. 
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S ABORT (Not used) 


The $ ABORT control card begins definition of a subactivity to be initiated 
only if the activity immediately preceding it is aborted. If this occurs, the $ 
FFILE, $ FUTIL, $ QUTIL, and $ ETC cards (the only cards following the $ ABORT 
card that are written by the System Input Collector on the U* file) are read in 
and processed by Utility. 
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OTHER CONTROL CARDS 


A particular Utility activity may require a request for extra storage. (See 
Utility Storage Requirements in this section.) This can be done by placing a 
S$ LIMITS card immediately behind the $ UTILITY control card. The $ LIMITS card 
can also be used to change the Utility SYSOUT line limit, normally 10,000. 


For further descriptions of the control cards, see the Control Cards 
Reference Manual. 


UTILITY STRUCTURE 


Utility is a slave program that provides two modes for processing tapes. 
The processing can be either by logical records (normally) or by physical 
records (by designating PHYREC on the input $ FFILE card). Only magnetic tape 
files can be handled by PHYREC processing. Logical records are read by means of 
the GET routine and written by the COPY routine. Physical records are read by 
the READ routine and written by the WRITE routine. These routines are explained 
in the File and Record Control reference manual. 


During initialization, storage availability is checked and buffers are set 
up. The U* file, previously written by System Input with Utility control cards, 
is opened. 


Only $ FFILE, $ FUTIL, $ QUTIL, and $ ETC cards are processed. In the case 
of a $ FFILE card, only options listed in the "Nonstandard Options" section are 
processed; all others are ignored. In the case of a $ FUTIL card, file code 
parameters are checked. If a $ FFILE card was present for the particular file 
code, the file control block is set to the desired options. If no $ FFILE card 
was present, standard options are placed in the file control block. If Utility 
generates two file control blocks, FCBl refers to the first file code and FCB2 
to the second. Initialization for each S$ FUTIL card also includes 
reinitialization of "running" file and record counts. The $ FUTIL card is then 
scanned for Utility functions, and as each function is recognized (a _ second 
slant encountered), this option is processed. All parameters in the $ FUTIL card 
must conform to those specified in "Utility Functions", Section II. 


I/O activities within Utility are performed with standard File and Record 
Control routines. When all functions specified on a $ FUTIL card are completed, 
files are closed (without rewind and without lock) unless the Hold option was 
specified. If Hold was used, the file control block for that particular file 
code is not closed. The Utility activity terminates when an end-of-file is 
encountered on the U* file. 
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DECK SETUPS 


Particular attention should be paid to the description of nonstandard files 
as described under "Nonstandard Options" in Section II. Note that Utility 
recognizes only nonstandard options; entries such as STDLBL are ignored. 


An example of a Utility deck setup is as follows: 


- 8 16 
S SNUMB 
$ IDENT 
S UTILITY 
$ FUTIL BD,,RWD/BD/,DUMP/1F/ 
$ TAPE BD,X1R, ,1234 
S ENDJOB 
In this example, file BD is rewound and one file is dumped from at. Note 


that two file code parameters must be specified on $ FUTIL cards, although one 
can be a null field. In subsequent examples, $ SNUMB, $ IDENT, and $ ENDJOB 
cards are not listed but are assumed present. 


1 8 16 

$ PrILITy 

$ LIMITS , 16384 

$ FFILE F1,PHYREC, LODENS 

$ FUTIL F1,F2,RWD/F1l,F2/,COPY/10F/,RWD/F1,F2/, 
$ HEC COMP/1OF/,RWD/F1,F2/,DUMP/, 10R/,RWD/F2/ 
S TAPE PL x1, piess 

S TAPE F2,X2D5%¢;7COPYEILE 


The above deck setup requests Utility to copy physically (rather than 
logically) 10 files from a tape of possibly unknown composition to a labeled, 
high density, binary tape. Both tapes are then to be verified by comparison, and 
10 records are to be dumped from the second tape (F2). The 16,384 words of 
storage requested permit comparison of physical (tape) records of up to 4224 
words in size or copying and dumping physical tape records of up to 8448 words. 
See "Utility Storage Requirements", in this section. 
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: 8 16 

$ UTILITY 

$ QUTIL EOF/ALL 

° FUTIL Fl, ,RWD/F1/,DUMP/99F/, RWD/F1/ 
$ TAPE F1,X1R 


This deck setup asks for a dump of 99 files, all file marks (except 75 and 
76) to be considered as file delimiters. If a partial labell is encountered, the 
dump is terminated. By specifying an unusually large number of files in this 
manner, it is possible to process any produced labeled tape (logical and 
physical record processing) or unlabeled tape (physical record processing only) 
without knowing its precise number of files. Utility stops any processing 
function and proceeds to the next one upon encountering a partial label. 


When a partial label is encountered, the tape is backspaced over the 
partial label and the following message is sent to P*: 


FILE CODE xx FILE # nn RECORD #1 


IS END OF DATA LABEL. FUNCTION ENDED. 


The partial label itself is counted as a new file; therefore, the number of 


useful data files on the device is nn - l. 
ua 8 16 
$ UP LGTY 
S FUTIL F1,F3,RWD/F1,F3/,COPY/3R/, HOLD/F3/ 
S FUTIL F2,F3,RWD/F2/,COPY/1R/,HOLD/F3/ 
$ FUTIL F1l,F3;RWO/FLi/s ;SKEP/4R/;,COPY/1F7 
S TAPE Pl, XD, , 2234 
S TAPE P2, X20; 4321 
° TAPE PA ;XSDy; 7 OUTELILE 


The preceding deck setup illustrates the HOLD function. In this example, 
it is assumed that the fourth logical record of a standard magnetic tape file, 
Fl, is to be changed and that a new copied file, F3, will be created. The 
corrected record to be copied is on F2. Initially, three records are copied from 
file Fl to file F3. F3 is held open with the HOLD function, and the new fourth 
record is copied from file F2. File F3 is again held open with the HOLD function 
and remainder of file Fl is copied to F3. The HOLD must be used to prevent 
output file, F3, from being closed before completion of the copying required to 
make up the logical file (see HOLD definition, Section IV). 


Ty partial label is written by File and Record Control on magnetic tapes as an 
end-of-information banner. It is distinguished from a standard label by the 
fact that it has zeros in words 5 through 10. 
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HOLD can also be used for holding within an input logical file. It could 
not, however, be used in the above example for Fl at the end of the Fizet. 5 
FUTIL card. This is because two FCBs would have been kept open, tying up _ both 
of Utility's FCB's. No new file (F2) could then be introduced. 


The following control card setup illustrates the use of the MCOPY function 
to merge three files from multiple inputs into a single file without 
intervening labels or file marks (octal 17). 


1 8 16 

S UTILITY DUMP 

S TAPE F2,X2D,,1234 

S TAPE P3,X3D;, «2345 

S TAPE F4,X4D, , 3456 

S TAPE FS, X5D; >, /ONEFIL 

S FUTIL F2,F5,REW/F2,F5/,MCOPY/1F/,HOLD/F5/ 

S FUTIL F3,F5,REW/F3/,MCOPY/1F/,HOLD/F5/ 

S FUTIL F4,F5,REW/F4/,MCOPY/1F/,REW/F5/,DUMP/,1F/ 


In this setup one file (F5) will have been created from the first EELS HSE 
F2,F3 and F4, without intervening labels or file marks. The newly created file 
F5, is then dumped using the DUMP option. 


The following deck setup illustrates the use of Utility's random file 
SKIP/DUMP capability. 


d 8 16 

$ is at aD IP hg 

$ FFILE AB , RANDOM/10 

S$ PRILE BC , RANDOM/0 

S$ PUTLG AB,BC,SKIP/5R/,DUMP/5R,1F/ 
5 FILE AB,A1R, 3R 

S$ PIGS BC, BLR, 2R 


In this deck setup, a 3-link random access file, AB, is to be skipped down 
by five 10-word records. Then, its next five 10-word records are to be dumped to 
p*, Finally, a 2-link random access file, BC, is to be dumped to P* by 64-word 
records. (See the $ FFILE parameter, RANDOM/n, in Section II.) 
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The following deck setup illustrates the use of the Utility RPT capability. 


2 8 16 

$ UTILITY 

S FUTIL FC,FD,RWD/FC,FD/, 

S ETC RPT/3P,2T/,COPY/10R/, SKIP/10R/,COPY/10R/, 
$ ETC REW/FC,FD/,DUMP/1F,1F/ 


In this example, records 1 through 10, 21 through 40, and 51 through 60 are 
copied from file FC to file FD. Both files are then rewound. The RPT and all 
repeat functions must be contained on one $ ETC control card that is a 
continuation of a $ FUTIL control card. Additional functions (not repeated) can 
be continued (as indicated) on $ ETC control cards. See Section IV for a 
definition of RPT. 


The following deck setup illustrates the use of the Utility ADUMP (or 
AADUMP) capability. 


= 8 16 

S UTILITY 

$ FUTIL FC,,ADUMP/1F/ 

S PRMFL FC,R,S;Ffile String 


The time sharing created linked file FC is dumped in both octal and its 
ASCII equivalent. 


The following deck setup illustrates the use of Utility's AADUMP physical 
record processing capability. 


1 8 16 

$ UTILITY 

$ TAPE IN,X1D, ,OLDTAPE 
$ FFILE IN , PHYREC 

$ FUTIL IN, ,AADUMP/1F/ 


OLDTAPE is in ASCII format. The tape is dumped in its ASCII representation, 
using physical record processing. 
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Upon termination of an MCOPY function, the following message is also placed 
on P*. 


TOTAL RECORDS. MCOPIED xXxXXxXxXX 


The record count xxxxxx shows the total number of records MCOPIED to the 
output. 


Example: If the function was MCOPY/3F/ and the three files contained 300, 
300, and 302 records respectively, the record count is 902 records. 


COMP Function--No Errors. If there were no compare errors and the COMP function 
was terminated by record countdown, the following message is placed on Pes 

COMPARED xxxxxx FILES xxxxxx RECORDS 

If there were no compare errors and the COMP function was terminated by an 
end-of-file having been reached, the following message is placed on P*: 

COMPARED xxxxxx FILES. xxxxxx RECORDS IN LAST FILE 
COMP Function--With Errors. If there were one or more compare errors when the 
compare function terminated, one of the following messages is placed on Pe cand 
the activity is terminated with a fatal error. 

COMP ERROR COUNT xXXXXxxX 

COMPARE COMPLETED. ERROR COUNT xXxxxxx 


or if the maximum number of compare errors allowed is exceeded, the compare 
function is aborted and the following message is used: 


COMPARE ABORTED. ERROR COUNT xxxxxx 


RSAVE, RREST, or RCOPY More or Less Than One File 


An attempt to use the RESAVE, RREST, or RCOPY functions for either more or 
less than one file at one time, results in the following message: 


SAVES 
UTILITY < RESTORES >} ONLY A FILE 
RCOPIES ) 


Printout in Compare Function 


Every specification of a COMP function results in the following printout 
that indicates that data on FILE (code) xx is to be compared with data on FILE 
(code) yy. 


COMPARE - xx VS yy 
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Printout in Backspace Function 


Every specification of a BKSP function results in the following printout if 
the loadpoint is encountered. 


FILE CODE xx LOADPOINT ON BKSP 


The following printouts indicate that there was a noncomparison and they 
identify by number the two files (mm) and two records (nn) which do not compare. 


FILE # mm -- RECORD # nn, AND FILE # mm -- RECORD # nn 


RECORDS DO NOT COMPARE 


Noncomparison of Data Records. The reason for noncomparison is shown by either 
of two printouts. The following printout indicates that the two records just 
compared were not the same size. When sizes do not compare, the COMP ERROR COUNT 
is incremented by one and no further check is made on the two records. The 
record sizes are printed, followed by a dump of the two unequal records. The 
printout is as. follows: 


SIZES DIFFERENT xxxxxx VS yyyyyy 
where: 

XXXXXX and yyyyyy are the sizes of the two records 

FILE CODE (#1) (DUMP OF FIRST BLOCK) 

FILE CODE (#2) (DUMP OF SECOND BLOCK) 

The following printout indicates that the two compared records are the same 
size but the data does not compare. When the data does not compare, the 
following line is printed and the COMP ERROR COUNT is incremented by one _ for 


each noncomparison within the two records. The printout is: 


###4 aaqgaaaaaaaaa bbbbbbbbbbbb ccccccdddddd 


where: 
#### = the word number within the record where the 
noncompare occurred 
a--a = the octal representation of the data word 
from file code xx 
b--b = the octal representation of the data word 


from file code yy 

c--c = the BCD equivalent of the data word 
from file code xx 

d--d = the BCD equivalent of the data word 
from file code yy 


Noncomparison of End-of-File Marks. The following printouts indicate that the 
EOF marks are not aligned. They specify which unit first encountered the EOF. 
The other unit is then aligned from a matching EOF before comparisons are 
resumed. If the number of files to be compared is exhausted during this 
positioning, comparison is terminated. The printout is either 
EOF LST UNIT ONLY 
or 


EOF 2ND UNIT ONLY 
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When the EOF marks are aligned but do not compare, the second device is 
positioned until either the file marks agree or the number of files or records 
to be processed is exhausted. The printout for noncomparing file marks is: 


END FILE MARK =- xx VS yy 
where: 


xx and yy are the disagreeing file marks 


Printout for Physical End-of-File 


While processing files on a random access device, a physical end-of-file 
condition may be encountered. Utility treats this as though a standard EOF was 
found. The printout is: 


PHYSICAL EOF ON RANDOM ACCESS DEVICE 


Printout in DUMP Function 


Logical Dumps. 


The heading line, which is printed once per file, contains the file number 
and the file code of the file. The contents of the record are then printed with 
the following information: the Block Number (BLK#), the Record Number (REC#), 
the lower part of the Record Control Word (RCW(L)), the Word Sequence Number 
(WRD¥) of the first data word of the line, and up to five data words in. octai 
and BCD equivalent. A Record Control Word is, of course, not printed for fixed 
length records. Refer to Appendix A, Figure A-1l, for an example of a Logical 
Dump. 


Physical Record Processing (PHYREC) Dumps 


The heading line, which is printed once per file, contains the file number, 
the file code and the density of the file. The contents of the record are then 
printed with the following information: the Block Number (BLK#), the Mode of 
that particular block, the Character Count (CC), the Word Sequence Number (WRD#) 
of the first data word of the line, and up to five data words in octal and BCD 
equivalent. Refer to Appendix A, Figures A-2 and A-3, for examples of a PHYREC 
Dump. 


Information Common to both Logical and Physical Dumps 


The following information is common to both Physical and Logical Dumps. For 
the BCD equivalent, the octal 17 (?) and _ octal 77 ('), special editing 
Characters, are replaced by an octal 37 (/). End-of-file marks are displayed in 
octal. On a labeled tape, each 14-word label is printed with its file code (if 
physical, the density and mode are also printed). Duplicate lines are suppressed 
and an asterisk is shown next to the word number in the line following one or 
more suppressed lines. Information such as BLK#, REC#¥, etc, is not printed if it 
is the same as for the preceding line. 
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Printout in Random Dump 


The heading line, which is printed once per file, contains the file number 
and the file code of the file. The contents of the record are then printed with 
the following information: the Record Number (REC#), the Word Sequence Number 
(WRD#) of the first data word of the line, and up to five data words in octal 
and BCD equivalent. For the BCD equivalent, the octal 17 (?) and octal 77 (!) 
special editing characters are replaced by an octal 37 (/). Duplicate lines are 
Suppressed and an asterisk is shown next to the word number in the _ line 
following one or more suppressed lines. Refer to Appendix A, Figure A-4, for an 
example of a Random Dump. 


Printout in DDUMP Function 


The printout is the same as that described for the DUMP functions, with 
these exceptions: 


Lx Only the BCD representation of the data words is shown, up to 14 words 
per line. 


Lie An asterisk is printed before and after the record, to show the exact 
starting and ending positions of the record. 


Refer to Appendix A, Figure A-5, A-6 and A-7, for examples of a DDUMP dump. 


Printout in ADUMP Function (Time Sharing Files) 


The Block Control Word (BCW) is printed before each block. Thereafter, the 
Record Control Word (RCW) is printed before each record. Contents of the record 
are printed up to five words per line in octal and ASCII equivalent. The first 
character, the string count, is replaced by an asterisk (octal 54). All null 
(unprintable) ASCII characters that transliterate to special editing characters 
(octal 77 and octal 17) are shown as octal 37 (/) in the ASCII equivalent. Refer 
to Appendix A, Figure A-8, for an example of a logical ADUMP function dump. 


Printout in AADUMP Function (Time Sharing Files) 


Each block is preceded by a printout of the Block Control Word. (B8CW):. 
Thereafter, each string is preceded by the Record .Control Word (RCW). The 
printout is one string per line in ASCII equivalent. A carriage return character 
(ASCII O15) is replaced by an octal 72 (=-) to denote a carriage return. -In 
addition, the string count iS converted to a decimal number. All null 
(unprintable) ASCII characters are replaced by an asterisk (octal 54). ASCII 
characters that transliterate to special editing characters (octal 77 and octal 
17) are shown as octal 37 (/) in the ASCII equivalent. Refer to Appendix A, 
Figure A-8, for example of a logical AADUMP function. 
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Printout in ADUMP and AADUMP Using Physical Record Processing 


Physical Record Processing (PHYREC) is applicable only to magnetic tape 
files. The output format is the same as a physical record dump with one 
difference -- the ASCII equivalent is used instead of the BCD equivalent. Blocks 
are dumped after each character has been transliterated. All null (unprintable) 
ASCII characters are replaced by an asterisk (octal 54). ASCII characters that 
transliterate to special editing characters (octal 77 and octal 17) are shown as 
octal 37 (/) in the ASCII equivalent. Refer to Appendix A, Figures A-9 and A-10, 
for examples of ADUMP and AADUMP using PHYREC. 


Printout in COPY, MCOPY Function 


ILLEGAL END FILE MARK xx--COPIED AS 67. 


The xx is the illegal file mark 77. 
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SECTION IV 


DETAILED DESCRIPTION OF UTILITY FUNCTIONS 


Utility performs the functions of COPY, MCOPY, COMPare, SKIP, BKSP, DUMP, 
ADUMP, AADUMP, DDUMP, REWind, HOLD, RPT, RSAVE, RREST, and RCOPY as follows: 


COPY 


When labeled tapes are copied, input header label words 7-13 of the most 
recently opened input tape are copied to the output label. Word 7 (creation 
date) and word 8 (retention days) can be changed by use of the NDATE and RETPER 
options of the $ FFILE card. Input trailer label words 3-13 are copied to the 
output trailer label. 


MCOPY 


Similar to the COPY function with this exception: When a standard octal LZ 
end of file mark is reached on the input, the output device is not closed but 
left open for merging multiple files into one single output file. However, the 
output file is closed if the MCOPY option is followed by a REWind of the output 
file; or at the end of the $ FUTIL card if there is no HOLD option for the 


output file. 


MCOPY should not be used with physical record processing (PHYREC) if block 
serial numbers are present (unless the RESEQ option is also used). File and 
Record Control builds new block serial numbers for output files in the logical 
record mode, but only copies block serial numbers in the physical record mode. 
Out of sequence block serial numbers would then be sent to output if MCOPY were 
used with physical record processing. The RESEQ option ona $ QUTIL card will 
take care of this problem. 


Logical Record Processing 


The input file is read, and the record size is transferred from the input 
record to the output record. The output file is then written to by means of the 
COPY routine. If both devices call for the standard variable-length record 
format, the report and media codes are transferred from the input record to the 
output buffer. 
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Physical Record Processing 


After the input device has been read, the DCW string is adjusted for the 
correct record length. Writing to the output device from the input buffer is by 
means of the WRITE routine. 


Utility cannot copy or dump checkpoints because the File and Record Control 
bypasses them and Utility never sees them. 


End-of-File Processing (both logical and physical) 


If the EOF is not 17 (octal), the file mark is transferred to the output 
device by Call WEF. If it is a standard 17 (octal) end-of-file mark, the output 
device is closed. A 23 (octal) filemark is standard on 9-track tape (rather than 
Ly. (octal) x 


COMPARE 


Record sizes are compared, and if they agree, a word-by-word comparison is 
made. If an end-of-file-mark is encountered on one device and not in the other, 
the other device is read (without comparison) until a similar end-of-file 
occurs. Then, comparison continues. When 50 (or n+ 1 as specified in a CMPERR 
QUTIL parameter) compare errors are encountered, the Utility activity is 
terminated on a fatal error. Also, even if the upper limit of compare errors is 
not reached, the existence of one or more compare errors at the completion of 
the compare function causes a termination of the Utility activity on ae fatal 
error. 


SKIP 


The first parameter refers to the first file code; the second parameter 
refers to the second. The device is read until the file/record count (as_ given 
in the $ FUTIL card SKIP parameters) is exhausted or a partial label is 
encountered. 


BKSP 


The first parameter refers to the first file code; the second parameter to 
the second, The device is read until the file/record count (as given in the 
$ FUTIL card BKSP parameters) is exhausted or a beginning-of-tape label is 
encountered. 


DUMP 


Information on the device is written out in both octal and BCD formats to 
p*, 
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Upon termination of an MCOPY function, the following message is also placed 
on P*, 


TOTAL RECORDS MCOPIED xxxxxx 


The record count xxxxxx shows the total number of records MCOPIED to the 
output. 


Example: If the function was MCOPY/3F/ and the three files contained 300, 
300, and 302 records respectively, the record count is 902 records. 


COMP Function--No Errors. If there were no compare errors and the COMP function 
was terminated by record countdown, the following message is placed on P*: 

COMPARED xxxxxx FILES xXXxXxXxx RECORDS 

If there were no compare errors and the COMP function was terminated by an 
end-of-file having been reached, the following message is placed on P*: 

COMPARED xxxxxx FILES. xxxxxx RECORDS IN LAST FILE 
COMP Function--With Errors. If there were one or more compare errors when the 
compare function terminated, one of the following messages is placed on P* and 
the activity is terminated with a fatal error. 

COMP ERROR COUNT xxXxxxx 

COMPARE COMPLETED. ERROR COUNT XxXxxxx 


or if the maximum number of compare errors allowed is exceeded, the compare 
function is aborted and the following message is used: 


COMPARE ABORTED. ERROR COUNT XXXXxXxX 


RSAVE, RREST, or RCOPY More or Less Than One File 


An attempt to use the RESAVE, RREST, or RCOPY functions for either more or 
less than one file at one time, results in the following message: 


SAVES 
UTILITY < RESTORES » ONLY A FILE 
RCOPIES ; 


Printout in Compare Function 


Every specification of a COMP function results in the following printout 
that indicates that data on FILE (code) xx is to be compared with data on FILE 
(code) yy. 


COMPARE - xx VS yy 
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Printout in Backspace Function 


Every specification of a BKSP function results in the following printout if 
the loadpoint is encountered. 


FILE CODE xx LOADPOINT ON BKSP 


The following printouts indicate that there was a noncomparison and _ they 
identify by number the two files (mm) and two records (nn) which do not compare. 


FILE # mm -- RECORD # nn, AND FILE # mm -- RECORD # nn 


RECORDS DO NOT COMPARE 


Noncomparison of Data Records. The reason for noncomparison is shown by either 
of two printouts. The following printout indicates that the two records just 
compared were not the same size. When sizes do not compare, the COMP ERROR COUNT 
is incremented by one and no further check is made on the two records. The 
record sizes are printed, followed by a dump of the two unequal records. The 
printout is as follows: 


SIZES DIFFERENT xxxxxx VS YVYVYVY 
where: 

XXXXXX and yyyyyy are the sizes of the two records 

FILE CODE (#1) (DUMP OF FIRST BLOCK) 

FILE CODE (#2) (DUMP OF SECOND BLOCK) 

The following printout indicates that the two compared records are the same 
size but the data does not compare. When the data does not compare, the 
following line is printed and the COMP ERROR COUNT is incremented by one for 


each noncomparison within the two records. The printout is: 


###4% aaaaaaaaaaaa bbbbbbbbbbbb ccccccdddddd 


where: 
#### = the word number within the record where the 
noncompare occurred 
a--a = the octal representation of the data word 
from file code xx 
b--b = the octal representation of the data word 


from file code yy 

c--c = the BCD equivalent of the data word 
from file code xx 

d--d = the BCD equivalent of the data word 
from file code yy 


Noncomparison of End-of-File Marks. The following printouts indicate that the 
EOF marks are not aligned. They specify which unit first encountered the EOF. 
The other unit is then aligned from a matching EOF before comparisons are 
resumed. If the number of files to be compared is exhausted during this 
positioning, comparison is terminated. The printout is either 
EOF 1ST UNIT ONLY 
or 


EOF 2ND UNIT ONLY 
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When the EOF marks are aligned but do not compare, the second device is 
positioned until either the file marks agree or the number of files or records 
to be processed is exhausted. The printout for noncomparing file marks is: 


END FILE MARK - xx VS yy 
where: 


xx and yy are the disagreeing file marks 


Printout for Physical End-of-File 


While processing files on a random access device, a _ physical end-of-file 
condition may be encountered. Utility treats this as though a standard EOF was 
found. The printout is: 


PHYSICAL EOF ON RANDOM ACCESS DEVICE 


Printout in DUMP Function 
Logical Dumps. 


The heading line, which is printed once per file, contains the file number 
and the file code of the file. The contents of the record are then printed with 
the following information: the Block Number (BLK#), the Record Number (REC#), 
the lower part of the Record Control Word (RCW(L)), the Word Sequence Number 
(WRD#) of the first data word of the line, and up to five data words im. o@tad 
and BCD equivalent. A Record Control Word is, of course, not printed for fixed 
length records. Refer to Appendix A, Figure A-1, for an example of a Logical 
Dump. 


Physical Record Processing (PHYREC) Dumps 


The heading line, which is printed once per file, contains the file number, 
the file code and the density of the file. The contents of the record are then 
printed with the following information: the Block Number (BLK#), the Mode of 
that particular block, the Character Count (CC), the Word Sequence Number (WRD# ) 
of the first data word of the line, and up to five data words in octal and_ BCD 
equivalent. Refer to Appendix A, Figures A-2 and A-3, for examples of a PHYREC 
Dump. 


Information Common to both Logical and Physical Dumps 


The following information is common to both Physical and Logical Dumps. For 
the BCD equivalent, the octal 17 (?) and octal 77 (°), special editing 
characters, are replaced by an octal 37 (/). End-of-file marks are displayed in 
octal. On a labeled tape, each 14-word label is printed with its file code (if 
physical, the density and mode are also printed). Duplicate lines are suppressed 
and an asterisk is shown next to the word number in the line following one or 
more suppressed lines. Information such as BLK#, REC¥, etc, is not printed if it 
is the same as for the preceding line. 
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Printout in Random Dump 


The heading line, which is printed once per file, contains the file number 
and the file code of the file. The contents of the record are then printed with 
the following information: the Record Number (REC#), the Word Sequence Number 
(WRD#) of the first data word of the line, and up to five data words in octal 
and BCD equivalent. For the BCD equivalent, the octal 17 (?) and octal 77 (%) 
Special editing characters are replaced by an octal 37 (/). Duplicate lines are 
Suppressed and an asterisk is shown next to the word number in the _ line 
following one or more suppressed lines. Refer to Appendix A, Figure A-4, for an 
example of a Random Dump. 


Printout in DDUMP Function 


The printout is the same as that described for the DUMP functions, with 
these exceptions: 


b Ae Only the BCD representation of the data words is shown, up to 14 words 
per line. 


La An asterisk is printed before and after the record, to show the exact 
starting and ending positions of the record. 


Refer to Appendix A, Figure A-5, A-6 and A-7, for examples of a DDUMP dump. 


Printout in ADUMP Function (Time Sharing Files) 


The Block Control Word (BCW) is printed before each block. Thereafter, the 
Record Control Word (RCW) is printed before each record. Contents of the record 
are printed up to five words per line in octal and ASCII equivalent. The first 
character, the string count, is replaced by an asterisk (octal 54). All null 
(unprintable) ASCII characters that transliterate to special editing characters 
(octal 77 and octal 17) are shown as octal 37 (/) in the ASCII equivalent. Refer 
to Appendix A, Figure A-8, for an example of a logical ADUMP function dump. 


Printout in AADUMP Function (Time Sharing Files) 


Each block is preceded by a printout of the Block Control Word (BCW). 
Thereafter, each string is preceded by the Record . Control Word (RCW). The 
printout is one string per line in ASCII equivalent. A carriage return character 
(ASCII 015) is replaced by an octal 72 (*=—) to denote a carriage return. In 
addition, the string count iS converted to a decimal number. All null 
(unprintable) ASCII characters are replaced by an asterisk (octal 54). ASCII 
characters that transliterate to special editing characters (octal 77 and octal 
17) are shown as octal 37 (/) in the ASCII equivalent. Refer to Appendix A, 
Figure A-8, for example of a logical AADUMP function. 
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Printout in ADUMP and AADUMP Using Physical Record Processing 


Physical Record Processing (PHYREC) is applicable only to magnetic tape 
files. The output format is the same as a physical record dump with one 
difference -- the ASCII equivalent is used instead of the BCD equivalent. Blocks 
are dumped after each character has been transliterated. All null (unprintable) 
ASCII characters are replaced by an asterisk (octal 54). ASCII characters that 
transliterate to special editing characters (octal 77 and octal 17) are shown as 
octal 37 (/) in the ASCII equivalent. Refer to Appendix A, Figures A-9 and A-10, 
for examples of ADUMP and AADUMP using PHYREC. 


Printout in COPY, MCOPY Function 


ILLEGAL END FILE MARK xx--COPIED AS 67. 


The xx is the illegal file mark 77. 
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SECTION IV 


DETAILED DESCRIPTION OF UTILITY FUNCTIONS 


Utility performs the functions of COPY, MCOPY, COMPare, SKIP, BKSP, DUMP, 
ADUMP, AADUMP, DDUMP, REWind, HOLD, RPT, RSAVE, RREST, and RCOPY as follows: 


COPY 


When labeled tapes are copied, input header label words 7-13 of the most 
recently opened input tape are copied to the output label. Word 7 (creation 
date) and word 8 (retention days) can be changed by use of the NDATE and RETPER 
options of the $ FFILE card. Input trailer label words 3-13 are copied to the 
output trailer label. 


MCOPY 


Similar to the COPY function with this exception: When a standard octal 17 
end of file mark is reached on the input, the output device is not closed but 
left open for merging multiple files into one single output file. However, the 
output file is closed if the MCOPY option is followed by a REWind of the output 
file: or at the end of the $ FUTIL card if there is- no HOLD option for the 


output file. 


MCOPY should not be used with physical record processing (PHYREC) if block 
serial numbers are present (unless the RESEQ option is also used). File and 
Record Control builds new block serial numbers for output files in the logical 
record mode, but only copies block serial numbers in the physical record mode. 
Out of sequence block serial numbers would then be sent. to output if MCOPY were 
used with physical record processing. The RESEQ option ona $ QUTIL card will 
take care of this problem. 


Logical Record Processing 


The input file is read, and the record size is transferred from the input 
record to the output record. The output file is then written to by means of the 
COPY routine. If both devices call for the standard variable-length record 
format, the report and media codes are transferred from the input record to the 
output buffer. 
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Physical Record Processing 


After the input device has been read, the DCW string is adjusted for the 
correct record length. Writing to the output device from the input buffer is by 
means of the WRITE routine, 


Utility cannot copy or dump checkpoints because the File and Record Control 
bypasses them and Utility never sees them. 


End-of-File Processing (both logical and physical) 


If the EOF is not 17 (octal), the file mark is transferred to the output 
device by Call WEF. If it is a standard 17 (octal) end-of-file mark, the output 
device is closed. A 23 (octal) filemark is standard on 9-track tape (rather than 
LT. f60C82)) 5 


COMPARE 


Record sizes are compared, and if they agree, a word-by-word comparison is 
made. If an end-of-file-mark is encountered on one device and not in the other, 
the other device is read (without comparison) until a similar end-of-file 
occurs. Then, comparison continues. When 50 (or n+ 1as specified in a CMPERR 
QUTIL parameter) compare errors are encountered, the Utility activity is 
terminated on a fatal error. Also, even if the upper limit of compare errors is 
not reached, the existence of one or more compare errors at the completion of 
the compare function causes a termination of the Utility activity on ae fatal 
error. 


SKIP 


The first parameter refers to the first file code; the second parameter 
refers to the second. The device is read until the file/record count (as _ given 
in the $ FUTIL card SKIP parameters) is exhausted or a partial label is 
encountered. 


BKSP 


The first parameter refers to the first file code; the second parameter to 
the second. The device is read until the file/record count (as given in the 
$ FUTIL card BKSP parameters) is exhausted or a beginning-of-tape label is 
encountered. 


DUMP 


Information on the device is written out in both octal and BCD formats to 
p*, 
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ADUMP 


Information on the device is written out in both octal and ASCII formats to 


p*, 
AADUMP 

Information on the device is written out only in ASCII format to P*. 
DDUMP 

Information on the device is written out only in BCD format to P*. 
REWIND 

The appropriate device is rewound. 
HOLD 


The file control block pertaining to this particular file code is not 
closed at the termination of this S FUTIL card's functions. The HOLD function is 
usually needed only with a $ FUTIL card on that the previous Utility function 
performed has specified records not files. This is because a file is closed by 
Utility at the completion of a function that specifies a file(s) (except for the 
MCOPY function). Consequently, a HOLD operation cannot hold open a file which 
Utility has already closed. One exception is the MCOPY function. HOLD can _ be 
used after an MCOPY function because use of the MCOPY function does not have 
closed the output file. See MCOPY, as previously described in this section. 


It may be necessary to use HOLD when reading multiple files from a random 
access device. At the end of all processing for a FUTIL card, not only are _ the 
files being used closed, but also their file control blocks are released. New 
file control blocks would be generated for additional FUTIL cards. This must not 
happen if the next file(s) on the random access device is to be read correctly. 
The HOLD option must be used in this case to keep the input file control block 
from being released between FUTIL cards. 


Repeat the next m functions n times. The RPT function plus the repeat 
functions must be contained on one $ ETC control card that continues a $ FUTIL 
control card. Nesting of a RPT function within itself is not permitted--you 
cannot repeat a repeat function. If a partial label is encountered during RPT 
processing, all processing terminates. A partial label is a label written by 
File and Record Control as an end of data banner on all magnetic tapes. 
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RSAVE 


128l-word physical records (1280 words plus the Block Serial Word) are 
written to a labeled magnetic tape. The last physical record written can contain 
less than 1280 words; i.e., it can contain 320, 640, or 960 words plus the Block 
Serial Word. 


RREST 


Utility reads a magnetic tape formatted as described in RSAVE above and 
writes it to a random file. Block serial numbers are checked as the tape is 
read. If a block serial error is encountered, the rest of the activity is 
aborted with an appropriate message. Multiple files can be saved on a magnetic 
tape by means of multiple RSAVE functions and any or all of these files can be 
restored by means of RREST functions. 


RCOPY 


Utility copies by 1280-word blocks (when possible) from the random input 
file to the random output file. The last block copied can be 320, 640, or 960 
words if the block is less than 1280 words. 
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SECTION V 


OWN CODE OPERATIONS WITH UTILITY 


OWN CODE CAPABILITY 


OWN CODE capability is a Utility feature that permits the user to change 
his files without having to write a separate program each time file maintenance 
is required. 


The user, by selecting the appropriate OWN CODE option, can specify that 
user coding be given control at any one of five points during a Utility run. The 
OWN CODE options (options 2-5 are effective only during a Utility COPY or MCOPY 
function) are as follows: 


Ls INITIALIZATION: If this option is selected, entry is made only once to 
OWN CODE for the option during Utility initialization procedures. 


2% COPY or MCOPY: In this option, entry is made to OWN CODE immediately 
after each input record has been read, but before the record has’ been 
copied. 


Ss END OF FILE: If this option is selected, entry is made to OWN CODE 
each time File and Record Control makes an end-of-file return to 
UVtLLLey. 


4. PRELABEL (input): In this option, entry to OWN CODE is made 
immediately after each standard input tape label has been read (but 
not yet checked). This is equivalent to using File and Record Controls 
prelabel entries. 


S34 POSTLABEL (output): This option is similar to the PRELABEL option and 
is equivalent to File and Record Control's post label entries. In this 
POSTLABEL option, entry to OWN CODE is made immediately after each 
magnetic tape label has been built (but before it has been written). 


An OWN CODE link (previously placed on H* by the user) is called by Utility 
if the first Utility control card in the activity is $ QUTIL USER. Note that, a 
$ LIMITS control card could precede the $ QUTIL USER card, because the $ LIMITS 
card is not a Utility control card. 
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OWN CODE FORMAT 


The OWN CODE link on H* must contain an option table as well as the user's 
routines for the options specified in the table. The user specifies in the 
option table the option(s) needed. The option table must be six words long. | 


The following table shows the option table format: 


TABLE INLD: Option Word 1 
Entry 


+1 COPY or MCOPY Word 2 ‘ 
Option Entry 


+2 EOF Option Word 3 
Entry 


+3 PRELABEL Word 4 
Option Entry 


+4 POSTLABEL Word 5 
Option Entry 


+5 FCB1 Word 6 


An option is effectively selected if the appropriate position in the table 
contains the starting address of the user's coding for this option. If an option 
is not used, its position in the table must contain zeros. Word 6 of the table 
is filled by Utility with the addresses of Utility's two file control blocks. 


USING OWN CODE 


OWN CODE must be present as a link on H*. The presence of a $ QUTIL USER 
card as the first Utility control card causes Utility to read in the OWN CODE 
link from H* and to set up linkages between OWN CODE and itself. 


The $ QUTIL USER card must be set up as follows: 


Aa 8 16 
S$ QUTIL USER 
No other parameters are permitted on this card. If other QUTIL options are 
required for this activity, they must be specified on other QUTIL cards. The 


USER: parameter on a $ OQUTIL card is legal only if the S$ QUTIL card is the’ fixyst 
Utility “control card for’ the: Utility activity. 
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The following is a sample deck setup showing the use of OWN CODE: 


8 16 

$ LOWLOAD 8956 

$ OPTION NOGO ,NOSETU, SAVE/USER 
: OWN CODE (either source deck for 
‘ assembly or an object deck) 

$ EXECUTE DUMP 

$ TAPE H* ,X7S 

$ UTILS 

$ LIMITS , 16000 

$ TAPE H* ,X7R 

$ QUTIL USER 
‘ Other Utility control cards 

S EN DJOB 


The numbers in this sample listing refer to the following definitions: 


The OWN CODE link must be loaded above UTILITY. 
The name of the link containing OWN CODE must be USER. 


The logical unit designator for H* may be any logical unit designator 
not being used at this time. 


APPLYING OWN CODE OPTIONS 


The following points pertain to all OWN CODE options: 


oe 


Transportation between Utility and OWN CODE is via index register l 
(Xl), and OWN CODE must preserve the contents of Xl in order to make a 
correct return to Utility. 


All registers except Xl are free for use by OWN CODE. Utility 
safestores the contents of its registers and indicators before 
transferring control to OWN CODE and restores them immediately after 
return to: UtLlity. 


Except for the INITIALIZATION option, OWN CODE is given control only 
during the COPY or MCOPY function. For example, OWN CODE for _ the 
PRELABEL option does not receive control during a DUMP, SKIP or 
COMPARE function. In the INITIALIZATION option, OWN CODE gets’ control 
only once, and that is during Utility's initialization procedures. OWN 
CODE can be used indirectly for the DUMP function by having OWN CODE 
make a new file with the COPY or MCOPY function and then doing a DUMP 
or DDUMP of the new file. 


Utility fills word 6 of the option table with the addresses of 
Utility's two file control blocks. 
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FILE CONTROL BLOCKS 


The address of the input file control block (FCB1) is stored in the left 
half of word 6 of the option table. The address of the output file control block 
(FCB2) is stored in the right half of word 6. The user may interrogate these 
blocks in his OWN CODE, but must not change them in any way. 


There is a special point to be considered in the interrogation of the input 
File control block. File and Record Control increases the block count in 
LOCSYM-6 in FCBl for each nonstandard file mark read. This is not increased in 
FCB2 for each nonstandard file mark written. 


No attempt should be made to interrogate the file control blocks in OWN 
CODE for the INITIALIZATION option, because the file control blocks have not yet 
been set up. 


OWN CODE STORAGE REQUIREMENTS 


When read in from H*, OWN CODE is loaded at the beginning (Utility is 
lowloaded) of Utility's available storage area. 


This area is normally used by Utility for I/O buffers. After OWN CODE is 
loaded, Utility adjusts its "beginning of available storage" pointers so that 
the buffers are setup immediately above the OWN CODE. All OWN CODE processing 
increase Utility's memory requirement to more than its standard allocation of 
10K; therefore a $ LIMITS card requesting more than 10K of memory is required. 
The load map for the OWN CODE link show the actual storage needed for the OWN 
CODE. 


EXAMPLES OF OWN CODE OPTIONS 


Each of the OWN CODE options is defined in the following examples. Each 
example illustrates the use of one option; however, any combination of options 
(including use of all options) can be used in one activity. 


INITIALIZATION Option 


If the OWN CODE entry location for this option is specified in the option 
table, OWN CODE is entered once during Utility's initialization. No attempt 
should be made to interrogate Utility's file control blocks in the OWN CODE for 
this option, since the file control blocks have not yet been set up. 
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Example 


OWN CODE Usage Identification. In the following example of OWN CODE, a one 
a line message 1S put on SYSOUT before Utility begins its processing: 


$ GMAP 
SYMDEF TABLE 
TABLE ARG INIT 
ARG 0 COPY 
ARG 0 EOF 
ARG 0 PRE 
ARG 0 POST 
FCBS ZERO aR UTILITY'S FCB'S 
INIT  sfTxl EXIT SAVE EXIT ADDRESS 
. CALL OPEN (LIST, 1) OPEN SYSOUT FILE 
CALL PRINT (FCB ,MESS, SLEW2) PRT MESSAGE 
CALL CLOSE (LIST, 1) CLOSE SYSOUT FILE 
EXIT TRA x 
; LIST  VFD 18/FCB,1/1 
FILCB FCB,AB, BUF,,,,6 
MESS _— BCI 6,THIS IS AN OWN CODE PASS OF UTILITY 
SLEW2 DEC 2 
BUF BSS 321 
END 


Among the control cards for this Utility activity using OWN CODE must be a 
S SYSOUT AB file card for file AB. 


COPY/MCOPY Option 


When the COPY or MCOPY option is specified, control is turned over to OWN 

CODE immediately after each input record has been fetched, but before it has 

<™ been copied. When control is turned over to the OWN CODE, the A- and Q-registers 
| contain the following: 


A |Address of first 
word of record 


Q | Record Size 


If logical record processing has been specified, the address in the high 
order half of the A-register is the current record index. In physical record 
: processing, the address is that of the first word of the tape block. 


At this time, index register 2 (X2) contains the address of Utility's input 
> file control block. In this way, if the address is needed, it does not have to 
be obtained from word 6 of the option table. 
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Returns to Utility. There are two returns to Utility from OWN CODE: 


ie TRA 0,1 


If this return is used, Utility gets the next input record. 


Zs L TSX6 4 
L+1 Zero X, 0 
L+2 Zero Ya 


L+3 Normal Return 


Address of first word of record to be written 


a 
il 


Record size 


KK 
II 


If this return is used, Utility writes to the output file the record 
whose starting address is specified by C(L+1)0-17 and whose length is 
specified by C(L+3)0-17. It then returns to L+3 of the OWN CODE. 


Example l - 


Record Insertion. If the second return is used to insert a variable length 
record from core storage, the user should be aware that Utility now considers 
L+l as the current record index of the input record. Utility assumes that the 
report and media code word for the record is located at "address-1," relative to 
the address given by the current record index. Therefore, the user must_ supply 
the report and media code, right justified, in a word in core storage preceding 
the first data word of that record. 


In the following example, logical record processing is assumed and a new 
record is inserted into the file. In addition, a new report code (octal 66) and 
media code (octal 3) is copied from a word preceding the first data word in 
storage. 
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$ GMAP 
SYMDEF TABLE 
TABLE ARG 0 INIT 
ARG COPY 
ARG ) EOF 
ARG 0 PRE 
ARG 0 POST 
FCBS ZERO Kk UTILITY FILE CONTROL BLOCKS 
COPY STAQ SAVAQ SAVE LOC AND LENGTH 
AOS COUNT 
LDA COUNT 
CMPA =6 ,DL IS THIS SIXTH RECORD 
TNZ WRITE NO 
TSX6 ae YES INSERT NEW RECORD 
ARG NEWREC LOC OF NEW RECORD 
ARG 5 LENGTH 
WRITE OTSX6 cs 5 COPY RECORD 
SAVAQ DEC 0 LOC OF RECORD 
DEC 0 LENGTH 
TRA bal RET URN 
MEDIA OCT 366 REPORT AND MEDIA CODE FOR 


NEW RECORD 


NEWREC BCI 5,THIS IS A NEW RECORD 7/7/69 
COUNT DEC 0 
END 
Example 2 - 


Changing One Word of a Record. The following example is used to change the 
block count in the first word of a physical record. This count is normally 
incremented by File and Record Control and is reset to one for the next reel in 
a multireel file. This example uses both the COPY and POST options and assumes 
physical record processing. Each time a header label is recognized, OWN CODE 
reinitializes the block count to zero. It also keeps its own block count for 


rebuilding block serial words on the output. 


$ GMAP 
SYMDEF TABLE 
TABLE ARG 0 INIT 
ARG COPY 
ARG 0 EOF 
ARG 0 PRE 
ARG POST 
FCBS ZERO eRe ne UTILITY FCB'S 
POST LDAQ 0,2 
CMPAQ HLBL IS THIS A HEADER LABEL 
TNZ Ok NO, RETURN 
STZ COUNT YES, ZERO COUNT 
TRA 0,1 RETURN 
COPY STAQ SAVAQ SAVE WORD LOC AND REC SIZE 
AOS COUNT ADD 1 TO COUNT 
LXL3 COUNT STORE COUNT IN BLOCK SERIAL 
WORD 
STX3 0,AU IN AU 
WRITE OTSX6 i,t WRITE RECORD 
SAVAO DEC 0 
DEC 0 
TRA O,1 
COUNT DEC 0 
HLBL EBCI 2, GE4460 0PBTL 


END 
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The above example is intended to be only illustrative in nature. The user 
would undoubtedly use the RESEQ option instead to reserialize block serial 
numbers. 


Example 3 - 


Changing and Inserting Words in a Record. In the following example of the 
COPY option, physical record processing 1s assumed. This processing does the 
following: 


us Places all zeros in word 2 of block 3. 
at Inserts a new block (five words) from storage between blocks 5 and 6. 
33 Starting with block 7, doesn't copy blocks which have a third word of 


all zeros. 


By proper use of the two methods of returning to Utility, a user can easily 
delete, modify or insert records. 


$ GMAP 
SYMDEF TABLE 
TABLE ARG 0 INIT 
ARG COPY 
ARG 0 EOF 
ARG 0 PRE 
ARG 0 POST 
FCBS ZERO Kk KK UTILITIES FCB'S 
COPY STAQ SAVAQ SAVE LOC AND LENGTH 
LDQ -6,2 GET 
ANQ =0777777,DU BLOCK NUMBER 
CMPQ = 9,000 THIRD BLOCK 
TZE THIRD YES 
CMPQ =6,DU IS THIS 6th BLOCK 
TZE SIXTH YES 
SZN 2, AU IS THIRD WORD ALL ZERO 
TZE 0,4 YES, DON'T COPY 
WRITE OTSX6 (res COPY RECORD 
SAVAQ DEC ) LOC OF RECORD 
DEC ) RECORD LENGTH 
TRA ot GET ANOTHER RECORD 
THIRD STZ, 1, AU 
TRA WRITE 
SIXTH TSX6 Led INSERT NEW BLOCK 
ARG NEWBLK 
ARG 5 
TRA WRITE COPY SIXTH BLOCK 
NEWBLK DEC jefe Gras ae a 
END 


If the input tape had block serial numbers, either OWN CODE would have had 
to resequence the block serial numbers or the RESEQ option would have had to _ be 
used. 
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Example 4 - 


Creating Test Files From One Logical Record. In this example, a test file 
of 25 three-word logical records is created From one logical record that could 
be input to Utility on a $ DATA file. The 24 additional records differ from the 
original record only in the second word, incremented by one for each succeeding 
record. 


Ss GMAP 
SYMDEF TABLE 
TABLE ARG 0 INIT 
ARG COPY 
ARG 0 EOF 
ARG 0 PRE 
ARG 0 POST 
FCBS ZERO kk KK UTILITY FCB'S 
COPY STA SAVA ADDRESS OF FIRST WORD OF REC 
TEST LDA RECCNT 
CMPA =25,DL HAVE WE WRITTEN 25 RECORDS 
TZE 0,2 YES RETURN 
TSX6 Lk 
SAVA DEC 0 
ARG 3 
LDx2 FCBS,1 LOAD WITH CRX 
AOS Dow 
AOS RECCNT ADD TO REC CNT 
TRA TEST 
RECCNT DEC 0 
END 


The FUTIL card for the activity could be as follows: 


8 16 


Ops 


FUTIL F1,F2,RWD/F1,F2/,COPY/1R/,RWD/F2/ 


END-OF-FILE Option 


In the end-of-file (EOF) option, OWN CODE is given control each time an EOF 
status is returned to Utility. When control is turned over to OWN CODE, the 
Q-register contains the EOF character that was returned to Utility, OWN CODE 
should return to Utility as follows: 


TRA O54. 


2930 32 


EOF Character 


A standard EOF on nine-track tape (23 octal) is an exception. The 
Q-register contains a 17 (octal) when a standard EOF is encountered on 
nine-track tape. 
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Depending on the EOF in the 


following action: 


Utility Action 


Q-register, 


bits 30-35, Utility takes 


Li (6eCalL) 


ii (oetal) 


“All others 


Example 1l- 


Changing EOF Marks. As indicated in the 
deleted easily with the OWN CODE end-of-file 
they must be added by using the COPY option. 


$ GMAP 
SYMDEF 
TABLE ARG 
ARG 
ARG 
ARG 
ARG 
FCBS ZERO 
EOF CMPQ 
TZE 
RET TRA 
CHANGE LDQ 
TRA 
END 


Close output file. 
EOF's by closing output file.) 


Do not put an EOF on output file. 


(Utility puts out standard 


Take standard action as if OWN CODE was not used. 


Write nonstandard EOF in Q lower to output file. 


the 


table, EOFs can be changed or 
option. If EOFs are to be added, 


INIT 
Cory 


PRE 

POST 

UTILITY FCB"S 
IS IT A O16 EOF 


NO, RETURN SAME EOF 
CHANGE TO O15 
AND RETURN TO UTILITY 


In this example, any 16 (octal) EOFs encountered on the input file(s), 
copied as 15 (octal) EOFs. 


are 
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PRELABEL Processing Option 


In the PRELABEL processing option, OWN CODE receives control immediately 
after an input magnetic tape label has been read but before it is checked. Index 
register 2 (X2) contains the starting location (always an even numbered 
location) of the label. Return to Utility must be by a TRA 0,1. The following 
File and Record Control label exit restriction must be observed: user code must 
not issue a logical record request for the file involved in the label procedure. 


Example ~ 


Verifying File Count on Tape. The following is an example of the PRELABEL 


processing option: 


FCBS 
PRE 


TEST 


GMAP 
SYMDEF 
ARG 
ARG 
ARG 
ARG 
ARG 
ZERO 
LDAQ 
CMPAQ 
TNZ 
RPL 
LDA 
TZE 
TRA 
LDX3 
LDQ 
ANO 
CMPO 


fed 
SBO 
MME 


HLBL EBCI 


TABLE 


=1,DL 
GEBORT 


2, GEBBE00BBTL 


INIT 
COPY 
EOF 


POST 
UTLIGITY FCR“S 


IS THIS HEADER LABEL 
NO, RETURN 

CHECK FOR PARTIAL LABEL 
RECOGNIZED BY ZEROS IN 
WORDS 5 THROUGH 10 


GET INPUT FOR ADDRESS 

GET FILE COUNT 

AND ISOLATE 

HAVE AT LEAST 4 DATA FILES 
BEEN READ 

YES, RETURN 

SUBTRACT FOR PARTIAL LABEL 

ABORT WITH FILE COUNT FOR REASON 
CODE 


This OWN CODE example verifies that there are at least four data files on a 
If there are less than four 


magnetic tape. 
aborted with the actual file count appearing 


partial label is counted as the fifth file. 


files on the 
as the abort 


tape, the job is 
reason code. The 


DD12 


POSTLABEL Processing Option 


In the POSTLABEL processing option, OWN CODE receives control immediately 
after each output magnetic tape label has been built, but before it is written. 
Index register 2 (X2) contains the starting location (always an even numbered 
location) of the label. Return to Utility must be by a TRA 0,1. The following 
File and Record Control label exit restriction must be observed: user code must 
not issue a logical record request for the file involved in the label procedure. 


Example 


Changing EOF to EOR. In the following example of the POSTLABEL processing 
option, an EOF trailer label is changed to an EOR trailer label: 


S GMAP 
SYMDEF TABLE 
TABLE ARG 0 INIT 
ARG 0 COPY 
ARG 0 EOF 
ARG 0 PRE 
ARG POST 
FCBS ZERO ak Ok UTILITY FCB'S 
POST LDA Goo 
CMPA EOFLB IS IT AN EOF LABEL 
TNZ 0,1 NO, RETURN 
LDA EORLB CHANGE 
STA 0,2 TO EOR LABEL 
TRA amel RETURN 
EORLB' BCI 1, BEOR 
EOFLB BCI 1, BEOF 
END 
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APPENDIX A 


EXAMPLES OF DUMP FUNCTIONS 


This appendix illustrates examples of various dump functions available to 
the user of Utility. 
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